#!/usr/bin/perl

print"Content-type:text/html; charset=utf-8\n\n";
print"<title>SipTestTool Wili 目录</title>";
print"<body>";

$Version = `grep -o -E \"[0-9]{1,}.[0-9]{2,}\" ../src/version.h`;

print "SipTestTool当前版本为$Version,最近编译时间为：<script language=\"JavaScript\" src=\"../JsBuildTag.js\" type=\"text/javascript\"> </script><p>";
print "如果你是第一次安装,你需要下载<a href=\"../stt_win32_bin_$Version.tbz2\">完整的程序包</a>,以及<a href=\"../stt_win32_dlls.tbz2\">所有的动态链接库</a>,它们都是tar.bz2格式的压缩文件，前者包含SipTestTool路径，而后者不包含这个路径<p>";
print  "如果这不是你的首次安装，并且你以前安装的是0.42以上的版本，你只需要下载可执行文件即可，其中包括<a href=\"../SipTestTool.exe\">SipTestTool主程序</a>, <a href=\"../sttdaemon.exe\">呼叫守护程序</a>和<a href=\"../CaseEditor.exe\">场景编辑程序</a>，有时候你还会想单独更新<a href=\"../zh_CN/SipTestTool.mo\">汉化文件</a>以及<a href=\"../SipTestTool-Debug.exe\">含有调试信息的主程序</a>,<a href=\"../sav/gdb-5.2.1-1.exe\">相关的调试器</a><p>";

print "wiki页面为SipTestTool的一些文档,下面列出了所有的已经发现的Wiki列表<p>";

$PageNo = 0;
while (<../siptesttool.wiki/*.wiki>) {
    $Desc=`sed -n -e '1p' $_ | awk '{ \$1=\"\"; print \$0 }'`;
    print "<a href='wiki.pl?$_'>$Desc</a><p>";
    $PageNo += 1;
}
print "总共有$PageNo个wiki页面!<br>";

print "</body>";

